Top 10k strings from G.E.B. - Stand (1985)(Data-Skip Software)(nl).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 ***********************
   1 x2=x1+(30.5
   1 vt1=vt/365
   1 verbruik=gm*0.34
   1 vastrecht gas     0.19
   1 vastrecht elektr. 0.16
   1 tot=verbruik+vast
   1 st=st2-st1
   1 sn=sn2-sn1
   1 result=vt1-tot
   1 gn=gn1/100
   1 gn=KWh (nacht)    0.25
   1 gn2=sn/z*100
   1 gm=gm1/100
   1 gm=KWH (dag)      0.34
   1 gm2=st/z*100
   1 gg=m3             0.66
   1 gg=gg1/100
   1 gg2=g/z*100
   1 geb       
   1 Vastrechten per dag:
   1 Soms geldt voor het         REM nachttarief een extra       REM v.recht-bedrag. Dit         REM kunt U in regel 2220        REM tot uiting laten komen.
   1 Deze pryzen zijn incl.      REM BTW en herleid tot kos-     REM ten per dag.
   1 Created with Ramsoft MakeTZX
   1 ;a$;"                                                   van de elektriciteit            ";
   1 ;"nachttarief";
   1 ;"Wat is de Start-datum?"
   1 ;"Geef datum alsvolgt:            ";
   1 ;"DDMMJJ ";
   1 ;"-stand op                                               ";a$;" ?"
   1 ;") (dagtarief)"
   1 ;"(dagtarief)":
   1 ;"(bijv. 260485)"
   1 ;" m3 gas"
   1 ;" kWh (nachttarief)"
   1 ;" kWh (dagtarief)"
   1 ;"  Welke datum is het vandaag ?  "
   1 ;"     voor het ";
   1 ;"                                ":
   1 (result*z);" terug"
   1 (result*365
   1 (-result*z);" bijbetalen"
   1 (-result*365
   1 '''" Wat is de meterstand v.d.       elektriciteit vandaag? (";
   1 '''"  Welkom bij G.E.B.-stand."  
   1 '''"  En de meterstand op  ";
   1 '''"    Wat was de ";
   1 '''"        Hoeveel bedraagt                      het                    maandelijks voorschot"
   1 ''"  wanneer het nachttarief niet    van toepassing is, toets '0'":
   1 ''"  Wat is de stand vandaag voor    het nachttarief.":
   1 ''"  Wat is de gasstand vandaag ?"
   1 ''"  Toets '0' wanneer het nacht-    tarief niet van toepassing is"
   1 ''"  Aantal verbruiksdagen sinds     ";a$;" is ";z;" dagen":
   1 ''"    Wat was de meterstand op                                                 ";
   1 ''"      Druk een toets"
   1 '"  Over ";z;" dagen had U hetvol-":
   1 "  moet U fl ";
   1 "  helaas."
   1 "  gende energieverbruik:" 
   1 "  gefeliciteerd."
   1 "  elektr,nacht";
   1 "  elektr,dag";
   1 "  U fl. ";
   1 "  Op jaarbasis is dit fl. ";
   1 "  Op jaarbasis is dit fl ";
   1 "  Op basis van ";z;" dagen,":
   1 "  Op basis van ";z;" dagen krijgt":
   1 "  Dit programma van Data-Skip     is een handige hulp om Uw       energieverbruik by te houden    en U te wijzen op evt. bij-     of terugbetaling. "
   1 "   gemiddeld   p/dag  p/maand"
   1  Data-Skip 1985
   1   totaal v.recht  0.35
   1                   ----